/*

	disparos.prg
	Control de los disparos del jugador
	
*/

//---------------------------------------------------------------------------------------
PROCESS disparo(xx,yy,velx,vely)

PRIVATE
	counter;
END

BEGIN

	file = fpg_toki;
	graph = 50;
	
	LOOP
		
		if ( counter > 100 )
			print("Disparo Destruido");
			break;
		else
			counter++;
		end
	
		xx += velx;
		yy += vely;
		
		x = xx - ts.x0;
		y = yy - ts.y0;
	
		frame;
		
	END

END

